HA$PBExportHeader$st_uo_transparent.sru
forward
global type st_uo_transparent from statictext
end type
end forward

global type st_uo_transparent from statictext
int Width=251
int Height=72
string Text="None"
Alignment Alignment=Center!
string FaceName="System"
FontCharSet FontCharSet=Ansi!
event ue_paint pbm_paint
end type
global st_uo_transparent st_uo_transparent

type variables
boolean ib_Painting
end variables

event ue_paint;if IsValid(this) then

	if ib_Painting then return 0
	ib_Painting = TRUE
	this.visible = false
	do while yield() ; loop
	this.visible = true
	ib_painting=false

end if

return 0
end event

event constructor;call super::constructor;this.BackColor = 2^29
end event

